home *** CD-ROM | disk | FTP | other *** search
/ Language/OS - Multiplatform Resource Library / LANGUAGE OS.iso / a_utils / perl / mac-perl / gs_102st.bin / GUSI / MakeAliases < prev    next >
MacBinary  |  1992-12-13  |  1.9 KB  |  [TEXT/MPS ]

open in: MacOS 8.1     |     Win98     |     DOS

browse contents    |     view JSON data     |     view as text


This file was processed as: MacBinary (archive/macBinary).

ConfidenceProgramDetectionMatch TypeSupport
10% dexvert MacBinary (archive/macBinary) fallback Supported
1% dexvert Text File (text/txt) fallback Supported
100% file MacBinary II, Sun Dec 13 17:11:50 1992, modified Sun Dec 13 17:11:50 1992, creator 'MPS ', type ASCII, 1083 bytes "MakeAliases" , at 0x4bb 628 bytes resource default (weak)
99% file data default
74% TrID Macintosh plain text (MacBinary) default
25% TrID MacBinary 2 default (weak)
100% siegfried fmt/1762 MacBinary (II) default
100% lsar MacBinary default


id metadata
keyvalue
macFileType[TEXT]
macFileCreator[MPS ]



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 0b 4d 61 6b 65 41 6c | 69 61 73 65 73 00 00 00 |..MakeAl|iases...|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 4d 50 53 | 20 00 00 00 00 00 00 00 |.TEXTMPS| .......|
|00000050| 00 00 00 00 00 04 3b 00 | 00 02 74 a7 51 65 a6 a7 |......;.|..t.Qe..|
|00000060| 51 65 a6 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |Qe......|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 d2 3f 00 00 |........|.....?..|
|00000080| 50 65 72 6c 20 2d 53 78 | 20 22 7b 30 7d 22 20 7b |Perl -Sx| "{0}" {|
|00000090| 22 50 61 72 61 6d 65 74 | 65 72 73 22 7d 3b 20 45 |"Paramet|ers"}; E|
|000000a0| 78 69 74 0d 0d 23 21 2f | 75 73 72 2f 6c 6f 63 61 |xit..#!/|usr/loca|
|000000b0| 6c 2f 62 69 6e 2f 70 65 | 72 6c 0d 23 23 23 23 23 |l/bin/pe|rl.#####|
|000000c0| 23 23 23 23 23 23 23 23 | 23 23 23 23 23 23 23 23 |########|########|
|000000d0| 23 23 23 23 23 23 23 23 | 23 23 23 23 23 23 23 23 |########|########|
|000000e0| 23 23 23 23 23 23 23 23 | 23 23 23 23 23 23 23 23 |########|########|
|000000f0| 23 23 23 23 23 23 23 23 | 23 23 23 23 23 23 23 23 |########|########|
|00000100| 23 23 0d 23 09 50 72 6f | 6a 65 63 74 09 3a 09 47 |##.#.Pro|ject.:.G|
|00000110| 55 53 49 09 09 09 2d 09 | 47 72 61 6e 64 20 55 6e |USI...-.|Grand Un|
|00000120| 69 66 69 65 64 20 53 6f | 63 6b 65 74 20 49 6e 74 |ified So|cket Int|
|00000130| 65 72 66 61 63 65 0d 23 | 09 41 75 74 68 6f 72 09 |erface.#|.Author.|
|00000140| 3a 09 4d 61 74 74 68 69 | 61 73 20 4e 65 65 72 61 |:.Matthi|as Neera|
|00000150| 63 68 65 72 0d 23 09 53 | 74 61 72 74 65 64 09 3a |cher.#.S|tarted.:|
|00000160| 09 30 38 53 65 70 39 32 | 09 09 09 09 09 09 09 09 |.08Sep92|........|
|00000170| 4c 61 6e 67 75 61 67 65 | 09 3a 09 50 65 72 6c 0d |Language|.:.Perl.|
|00000180| 23 09 4d 6f 64 69 66 69 | 65 64 09 3a 09 32 31 4e |#.Modifi|ed.:.21N|
|00000190| 6f 76 39 32 09 4d 4e 09 | 43 6f 6e 73 69 64 65 72 |ov92.MN.|Consider|
|000001a0| 20 65 78 74 65 72 6e 61 | 6c 73 0d 23 09 4c 61 73 | externa|ls.#.Las|
|000001b0| 74 09 09 3a 09 32 31 4e | 6f 76 39 32 0d 23 23 23 |t..:.21N|ov92.###|
|000001c0| 23 23 23 23 23 23 23 23 | 23 23 23 23 23 23 23 23 |########|########|
|000001d0| 23 23 23 23 23 23 23 23 | 23 23 23 23 23 23 23 23 |########|########|
|000001e0| 23 23 23 23 23 23 23 23 | 23 23 23 23 23 23 23 23 |########|########|
|000001f0| 23 23 23 23 23 23 23 23 | 23 23 23 23 23 23 23 23 |########|########|
|00000200| 23 23 23 23 0d 0d 6f 70 | 65 6e 28 41 4c 49 41 53 |####..op|en(ALIAS|
|00000210| 2c 20 22 41 6c 69 61 73 | 65 73 22 29 20 09 09 7c |, "Alias|es") ..||
|00000220| 7c 20 64 69 65 20 22 43 | 61 6e 27 74 20 6f 70 65 || die "C|an't ope|
|00000230| 6e 20 66 69 6c 65 20 5c | 22 41 6c 69 61 73 65 73 |n file \|"Aliases|
|00000240| 5c 22 22 3b 0d 6f 70 65 | 6e 28 45 58 54 2c 09 22 |\"";.ope|n(EXT,."|
|00000250| 47 55 53 49 2e 65 78 74 | 22 29 09 09 7c 7c 20 64 |GUSI.ext|")..|| d|
|00000260| 69 65 20 22 43 61 6e 27 | 74 20 6f 70 65 6e 20 66 |ie "Can'|t open f|
|00000270| 69 6c 65 20 5c 22 47 55 | 53 49 2e 65 78 74 5c 22 |ile \"GU|SI.ext\"|
|00000280| 22 3b 0d 6f 70 65 6e 28 | 44 46 2c 20 09 22 3e 41 |";.open(|DF, .">A|
|00000290| 6c 69 61 73 2e 64 66 22 | 29 09 7c 7c 20 64 69 65 |lias.df"|).|| die|
|000002a0| 20 22 43 61 6e 27 74 20 | 6f 70 65 6e 20 66 69 6c | "Can't |open fil|
|000002b0| 65 20 5c 22 41 6c 69 61 | 73 2e 64 66 5c 22 22 3b |e \"Alia|s.df\"";|
|000002c0| 0d 6f 70 65 6e 28 44 46 | 31 2c 20 09 22 3e 41 6c |.open(DF|1, .">Al|
|000002d0| 69 61 73 31 2e 64 66 22 | 29 09 7c 7c 20 64 69 65 |ias1.df"|).|| die|
|000002e0| 20 22 43 61 6e 27 74 20 | 6f 70 65 6e 20 66 69 6c | "Can't |open fil|
|000002f0| 65 20 5c 22 41 6c 69 61 | 73 31 2e 64 66 5c 22 22 |e \"Alia|s1.df\""|
|00000300| 3b 0d 6f 70 65 6e 28 52 | 4e 2c 09 09 22 3e 41 6c |;.open(R|N,..">Al|
|00000310| 69 61 73 2e 72 6e 22 29 | 09 7c 7c 20 64 69 65 20 |ias.rn")|.|| die |
|00000320| 22 43 61 6e 27 74 20 6f | 70 65 6e 20 66 69 6c 65 |"Can't o|pen file|
|00000330| 20 5c 22 41 6c 69 61 73 | 2e 72 6e 5c 22 22 3b 0d | \"Alias|.rn\"";.|
|00000340| 0d 77 68 69 6c 65 20 28 | 3c 41 4c 49 41 53 3e 29 |.while (|<ALIAS>)|
|00000350| 09 7b 0d 09 69 66 20 28 | 2f 28 5c 53 2b 29 5c 73 |.{..if (|/(\S+)\s|
|00000360| 2b 28 5c 53 2b 29 2f 29 | 20 7b 0d 09 09 24 41 6c |+(\S+)/)| {...$Al|
|00000370| 69 61 73 7b 24 31 7d 20 | 3d 20 24 32 3b 0d 09 0d |ias{$1} |= $2;...|
|00000380| 09 09 70 72 69 6e 74 20 | 52 4e 20 20 22 20 20 20 |..print |RN " |
|00000390| 2d 72 6e 20 24 31 3d 24 | 32 5c 6e 22 20 75 6e 6c |-rn $1=$|2\n" unl|
|000003a0| 65 73 73 20 28 24 31 20 | 65 71 20 24 32 29 3b 0d |ess ($1 |eq $2);.|
|000003b0| 09 7d 0d 7d 0d 0d 63 6c | 6f 73 65 20 41 4c 49 41 |.}.}..cl|ose ALIA|
|000003c0| 53 3b 0d 0d 77 68 69 6c | 65 20 28 3c 45 58 54 3e |S;..whil|e (<EXT>|
|000003d0| 29 09 7b 0d 09 69 66 20 | 28 2f 28 5c 53 2b 29 2f |).{..if |(/(\S+)/|
|000003e0| 29 20 7b 0d 09 09 24 45 | 78 74 7b 24 31 7d 20 3d |) {...$E|xt{$1} =|
|000003f0| 20 31 3b 0d 09 7d 0d 7d | 0d 0d 63 6c 6f 73 65 20 | 1;..}.}|..close |
|00000400| 45 58 54 3b 0d 0d 77 68 | 69 6c 65 20 28 3c 3e 29 |EXT;..wh|ile (<>)|
|00000410| 09 7b 0d 09 69 66 20 28 | 2f 5e 28 5c 53 2b 29 2e |.{..if (|/^(\S+).|
|00000420| 2a 5c 24 2f 20 7c 7c 20 | 2f 45 50 3d 28 5c 53 2b |*\$/ || |/EP=(\S+|
|00000430| 29 2f 29 20 7b 0d 09 09 | 75 6e 6c 65 73 73 20 28 |)/) {...|unless (|
|00000440| 24 41 6c 69 61 73 7b 24 | 31 7d 29 20 7b 0d 09 09 |$Alias{$|1}) {...|
|00000450| 09 69 66 20 28 24 45 78 | 74 7b 24 31 7d 29 20 7b |.if ($Ex|t{$1}) {|
|00000460| 0d 09 09 09 09 70 72 69 | 6e 74 20 44 46 31 20 22 |.....pri|nt DF1 "|
|00000470| 24 31 5c 6e 22 3b 0d 09 | 09 09 7d 20 65 6c 73 65 |$1\n";..|..} else|
|00000480| 20 7b 0d 09 09 09 09 70 | 72 69 6e 74 20 44 46 20 | {.....p|rint DF |
|00000490| 22 24 31 5c 6e 22 3b 0d | 09 09 09 7d 0d 09 09 7d |"$1\n";.|...}...}|
|000004a0| 0d 09 7d 0d 7d 0d 0d 63 | 6c 6f 73 65 20 44 46 3b |..}.}..c|lose DF;|
|000004b0| 0d 63 6c 6f 73 65 20 52 | 4e 3b 0d 00 00 00 00 00 |.close R|N;......|
|000004c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000004f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000500| 00 00 01 00 00 00 02 0c | 00 00 01 0c 00 00 00 68 |........|.......h|
|00000510| 20 20 20 20 20 20 20 20 | 65 78 74 20 20 20 0d 5f | |ext ._|
|00000520| 63 6f 49 6f 63 74 6c 20 | 20 20 20 20 20 20 20 20 |coIoctl | |
|00000530| 0b 4d 61 6b 65 41 6c 69 | 61 73 65 73 02 00 00 00 |.MakeAli|ases....|
|00000540| 54 45 58 54 4d 50 53 20 | 00 00 ff ff ff ff 00 00 |TEXTMPS |........|
|00000550| 00 00 54 45 58 54 4d 50 | 53 20 00 00 ff ff ff ff |..TEXTMP|S ......|
|00000560| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000570| 00 00 a6 10 87 ef 00 00 | 04 3b 00 00 02 74 20 20 |........|.;...t |
|00000580| 53 41 44 45 56 20 20 20 | 20 20 20 20 20 20 20 20 |SADEV | |
|00000590| 65 78 74 20 20 20 0d 5f | 73 79 46 41 63 63 65 73 |ext ._|syFAcces|
|000005a0| 73 20 20 20 20 20 20 20 | 20 20 20 24 30 30 30 30 |s | $0000|
|000005b0| 30 31 38 34 20 20 43 6f | 64 65 20 20 53 41 44 45 |0184 Co|de SADE|
|000005c0| 56 20 20 20 20 20 20 20 | 20 20 20 20 65 78 74 20 |V | ext |
|000005d0| 20 20 0d 5f 73 79 43 6c | 6f 73 65 20 20 20 20 20 | ._syCl|ose |
|000005e0| 20 20 20 20 20 20 20 24 | 30 30 30 30 30 30 31 36 | $|00000016|
|000005f0| 20 20 43 6f 64 65 20 20 | 53 41 44 45 56 20 20 20 | Code |SADEV |
|00000600| 00 00 00 48 00 09 4d 6f | 6e 61 63 6f 00 ff 7f ff |...H..Mo|naco....|
|00000610| 00 00 00 09 00 00 00 14 | 00 06 26 ac 00 0a 80 01 |........|..&.....|
|00000620| 80 01 7f ff 7f ff 00 06 | 00 03 00 50 00 20 01 dd |........|...P. ..|
|00000630| 02 3d 00 50 00 20 01 dd | 02 3d a7 51 2d 66 00 00 |.=.P. ..|.=.Q-f..|
|00000640| 00 1d 00 00 00 1d 00 00 | 00 00 01 00 00 00 00 16 |........|........|
|00000650| 00 01 00 00 01 0d 00 00 | 01 2b 0b 4c 61 73 74 43 |........|.+.LastC|
|00000660| 68 61 6e 67 65 00 00 00 | 00 1e 00 50 00 20 01 dd |hange...|...P. ..|
|00000670| 02 3d 00 50 00 20 01 dd | 02 3d 00 00 00 00 00 00 |.=.P. ..|.=......|
|00000680| 00 00 00 00 00 00 00 00 | 00 00 00 80 18 84 5d c0 |........|......].|
|00000690| 3f e5 32 30 00 04 00 00 | 00 00 00 00 00 00 a7 51 |?.20....|.......Q|
|000006a0| 7b e7 a7 51 2d 66 a6 71 | 49 ef 00 00 bf be 00 01 |{..Q-f.q|I.......|
|000006b0| 00 2d 00 01 05 47 55 53 | 49 ba 00 05 6e 65 65 72 |.-...GUS|I...neer|
|000006c0| 69 00 01 31 00 0b 4d 61 | 6b 65 41 6c 69 61 73 65 |i..1..Ma|keAliase|
|000006d0| 73 00 00 00 00 35 03 ce | 00 17 03 e4 00 2b 00 3a |s....5..|.....+.:|
|000006e0| 00 2c 03 62 00 2d 03 92 | 00 14 00 01 00 00 41 6c |.,.b.-..|......Al|
|000006f0| 69 61 73 2e 70 6c 00 00 | 00 00 00 00 00 26 00 02 |ias.pl..|.....&..|
|00000700| 00 00 41 6c 69 61 73 65 | 73 00 00 00 00 00 01 00 |..Aliase|s.......|
|00000710| 00 00 02 0c 00 00 01 0c | 00 00 00 68 00 49 aa 38 |........|...h.I.8|
|00000720| 13 d6 00 00 00 1c 00 5e | 00 01 4d 50 53 52 00 02 |.......^|..MPSR..|
|00000730| 00 12 63 6b 69 64 00 00 | 00 36 03 ed ff ff 00 00 |..ckid..|.6......|
|00000740| 00 00 00 00 00 00 03 ef | ff ff 00 00 00 4c 00 00 |........|.....L..|
|00000750| 00 00 03 f0 ff ff 00 00 | 00 66 00 00 00 00 00 80 |........|.f......|
|00000760| 00 00 00 00 00 88 00 4f | dc c0 09 50 72 6f 6a 65 |.......O|...Proje|
|00000770| 63 74 6f 72 00 00 00 00 | 00 00 00 00 00 00 00 00 |ctor....|........|
+--------+-------------------------+-------------------------+--------+--------+